সিস্টেম ফাইল এবং রেজিস্ট্রি ম্যানিপুলেশন

VBScript ব্যবহার করে সিস্টেম ফাইল এবং রেজিস্ট্রি ম্যানিপুলেশন করা যায়। এই স্ক্রিপ্টিং ভাষার মাধ্যমে আপনি ফাইল পরিচালনা, ফোল্ডার তৈরি বা মুছে ফেলা, ফাইল কপি, পেস্ট, এবং রেজিস্ট্রি হ্যাকিং বা সেটিংস পরিবর্তন করতে পারবেন। এগুলি সাধারণত সিস্টেম অ্যাডমিনিস্ট্রেশন, অটোমেশন কাজ এবং সিস্টেম কনফিগারেশন ম্যানেজমেন্টে ব্যবহৃত হয়।

সিস্টেম ফাইল ম্যানিপুলেশন (File Manipulation)

ফাইল ম্যানিপুলেশন করতে FileSystemObject (FSO) ব্যবহার করা হয়। FSO একটি শক্তিশালী অবজেক্ট যা সিস্টেম ফাইল এবং ফোল্ডার পরিচালনা করতে সহায়তা করে।

ফাইল তৈরি করা (Creating a File)

Dim fso, file
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল তৈরি
Set file = fso.CreateTextFile("C:\example.txt", True)
file.WriteLine("This is a test file.")
file.Close

' অবজেক্ট রিলিজ করা
Set fso = Nothing
Set file = Nothing

এখানে:

• CreateTextFile মেথড ব্যবহার করে C:\example.txt ফাইলটি তৈরি করা হয়েছে এবং তার মধ্যে একটি টেক্সট লাইন লেখা হয়েছে।

ফাইল কপি এবং মুছে ফেলা (Copying and Deleting Files)

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফাইল কপি করা
fso.CopyFile "C:\example.txt", "C:\backup\example.txt"

' ফাইল মুছে ফেলা
fso.DeleteFile "C:\example.txt"

' অবজেক্ট রিলিজ করা
Set fso = Nothing

এখানে:

• CopyFile মেথড ব্যবহার করে example.txt ফাইলটি কপি করা হয়েছে।
• DeleteFile মেথড ব্যবহার করে example.txt ফাইলটি মুছে ফেলা হয়েছে।

ফোল্ডার তৈরি এবং মুছে ফেলা (Creating and Deleting Folders)

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

' ফোল্ডার তৈরি করা
If Not fso.FolderExists("C:\TestFolder") Then
    fso.CreateFolder("C:\TestFolder")
End If

' ফোল্ডার মুছে ফেলা
If fso.FolderExists("C:\TestFolder") Then
    fso.DeleteFolder("C:\TestFolder")
End If

' অবজেক্ট রিলিজ করা
Set fso = Nothing

এখানে:

• CreateFolder মেথড ব্যবহার করে একটি নতুন ফোল্ডার তৈরি করা হয়েছে।
• DeleteFolder মেথড ব্যবহার করে একটি ফোল্ডার মুছে ফেলা হয়েছে।

রেজিস্ট্রি ম্যানিপুলেশন (Registry Manipulation)

Windows রেজিস্ট্রি ম্যানিপুলেশন করার জন্য WScript.Shell অবজেক্ট ব্যবহার করা হয়। এটি রেজিস্ট্রি কী তৈরি, পড়া, আপডেট এবং মুছে ফেলতে সহায়তা করে।

রেজিস্ট্রি কী তৈরি এবং মান সেট করা (Creating Registry Key and Setting Values)

Dim objShell
Set objShell = CreateObject("WScript.Shell")

' রেজিস্ট্রি কী তৈরি এবং মান সেট করা
objShell.RegWrite "HKEY_CURRENT_USER\Software\MyApp\Settings\Theme", "Dark", "REG_SZ"

' অবজেক্ট রিলিজ করা
Set objShell = Nothing

এখানে:

• RegWrite মেথড ব্যবহার করে HKEY_CURRENT_USER\Software\MyApp\Settings\Theme কী তৈরি করা হয়েছে এবং এর মান "Dark" সেট করা হয়েছে।

রেজিস্ট্রি মান পড়া (Reading Registry Values)

Dim objShell, value
Set objShell = CreateObject("WScript.Shell")

' রেজিস্ট্রি মান পড়া
value = objShell.RegRead("HKEY_CURRENT_USER\Software\MyApp\Settings\Theme")

' রেজিস্ট্রি মান দেখানো
MsgBox value

' অবজেক্ট রিলিজ করা
Set objShell = Nothing

এখানে:

• RegRead মেথড ব্যবহার করে রেজিস্ট্রি থেকে মান পড়া হয়েছে এবং MsgBox ব্যবহার করে তা প্রদর্শন করা হয়েছে।

রেজিস্ট্রি কী মুছে ফেলা (Deleting Registry Key)

Dim objShell
Set objShell = CreateObject("WScript.Shell")

' রেজিস্ট্রি কী মুছে ফেলা
objShell.RegDelete "HKEY_CURRENT_USER\Software\MyApp\Settings\Theme"

' অবজেক্ট রিলিজ করা
Set objShell = Nothing

এখানে:

• RegDelete মেথড ব্যবহার করে নির্দিষ্ট রেজিস্ট্রি কী মুছে ফেলা হয়েছে।

সারাংশ

• FileSystemObject (FSO) ব্যবহার করে ফাইল এবং ফোল্ডার পরিচালনা করা যায় যেমন, ফাইল তৈরি, কপি, মুছে ফেলা, এবং ফোল্ডার তৈরি ও মুছে ফেলা।
• WScript.Shell ব্যবহার করে Windows রেজিস্ট্রি ম্যানিপুলেট করা যায়, যেমন রেজিস্ট্রি কী তৈরি, মান পড়া, মান সেট করা, এবং কী মুছে ফেলা।

এই স্ক্রিপ্টিং ক্ষমতা সিস্টেম অ্যাডমিনিস্ট্রেশন এবং অটোমেশন কাজের জন্য খুবই কার্যকরী।